home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
64'er
/
64ER_CD.iso
/
sh4x
/
sh45a.d64
/
listing 18
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
1995-03-30
|
194b
|
8 lines
10 PRINTCHR$(147):V=53248:FOR S=832 TO 895:POKE S,255:NEXT
20 FOR M=2040 TO 2042:POKE M,13:NEXT
30 POKE V+21,7
40 POKE V+39,1:POKE V+40,7:POKE V+41,8
50 POKE V,24:POKE V+1,50:POKE V+16,0
60 POKE V+2,34:POKE V+3,60
70 POKE V+4,44:POKE V+5,70